function e = errorFunction( X, wf, b )
% ERRORFUNCTION 
%   Esta funcion calcula el error cuadrático medio 

%   X: patrones de entrada donde cada columna es un patr?n.
%   wf: pesos de las entradas de una red neuronal entrenada.
%   b: valor esperado de salida de la red.
    
    %errori = g_function(X*wf) - b; Original
    
    acum = 0;
    for t = 1:length(X(1, :))
        errori = b(t) - valPattern(wf, X(:,t));
        errori = errori.^2;
        acum = acum + sum(errori);
    end
    
    e = acum/2;
end

